﻿Public Class AdminInfoStaff1
    Inherits System.Web.UI.Page
    Dim nv As New NhanVien_BLL()
    Dim p As New NhanVien_DTO()
    Dim objUser As New LoginHelper("", "")
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        load_infonv()
    End Sub
    Public Sub load_infonv()
        objUser = TryCast(Session("sesLoginAdmin"), LoginHelper)
        p._taikhoannv = objUser.UserName
        datalist_info.DataSource = nv.load_infonv(p)
        datalist_info.DataBind()
    End Sub
End Class